-- Compute mean of a list.

-- Exercise 3.
-- Naive version
mean xs = (sum xs) / (fromIntegral (length xs))
